home *** CD-ROM | disk | FTP | other *** search
/ PsL Monthly 1993 December / PSL Monthly Shareware CD-ROM (December 1993).iso / prgmming / win / vb / gpib.exe / 488.FRM (.txt) < prev    next >
Encoding:
Visual Basic Form  |  1991-08-21  |  4.8 KB  |  143 lines
  1. Form1
  2. Control Panel
  3. Form1
  4. Init488
  5. Init 488
  6. Command1
  7. Start Conv
  8. Command2
  9. End Conv
  10. Text3
  11. Status
  12. Label2
  13. Readout
  14. Command3
  15. Finish
  16. Label1
  17. Rate1    
  18. Text1
  19. Text2
  20. Label4
  21.      -    RATE (secs)     +
  22. Label3
  23.    Set        Current
  24. HScroll1    
  25. Label5
  26.    F.S. Range
  27. Init488_Click
  28. Command1_Click
  29. retdataj
  30. Frame1
  31. Frame1_DragDrop
  32. Sourcem
  33. label1w
  34. Label1_ClickN
  35. caption
  36. HScroll1_Change(
  37. Command2_Click
  38. Form_Click:
  39. init488
  40. Command3_Click
  41. WaitingP
  42. Count1_Change
  43. text1b
  44. textD
  45. text2
  46. Text3_Change
  47. text3
  48. endconv
  49. Command2_GotFocus
  50. Text1_Change
  51. Text2_Change
  52. false    
  53. exitloopL
  54. command1
  55.     numevents
  56. @    Form_Load
  57. Command2t
  58. Rate1_Change
  59. rate1
  60. value
  61. initedT
  62. leave
  63. newtime
  64. timemax
  65. leave1
  66. Label4_Click
  67. chart
  68. form2
  69. plot1
  70. countg
  71. first4
  72. conversion<
  73.     firstread
  74. lastread
  75. currentread
  76. delta
  77. thisread#
  78.     deltarrayC
  79. Thenfirstread
  80. form1
  81. countlimit
  82.     forecolor
  83. range
  84. hscroll1
  85. vscroll1
  86. label5
  87. form3
  88. Remote
  89. label2
  90. label3
  91. Label5_Click
  92. visible
  93. label4
  94. Init488_Click
  95. f:\hardware\temp\data2.dat
  96. RESET"u
  97. ABORT"u
  98. CLEAR"u
  99. OUTPUT 1;R3"u
  100. 20v F.S.
  101. OUTPUT 1;F1"u
  102. OUTPUT 1;T2"u
  103. OUTPUT 1;S0"u
  104. OUTPUT 1;Y0"u
  105. Init Done"
  106. set up the 8840 displayy
  107. Offset off
  108. Command1_Click
  109. Command2.SetFocuss
  110. Init 488
  111.  Beginning of conversion routine
  112. Running"
  113. OUTPUT 1;?u
  114. ENTER 1"u
  115. OVERFLOW
  116. OVERFLOW
  117.  PLOT IT
  118.  STORE DATA IN ARRAY
  119. Conversion "
  120.  DELAY
  121. Stopped"
  122. Command2_Click
  123. form2.plot1.Cls5
  124. form2.plot1.Line (0, 0)-(100, 0)
  125. Command3_Click
  126. Command2_GotFocus
  127. Rate1_Change
  128. Form_Load
  129. HScroll1_Change
  130. OUTPUT 1;R1"u
  131. 200mv F.S.
  132. 200mv"
  133. OUTPUT 1;R2"u
  134. 2v F.S."
  135. OUTPUT 1;R3"u
  136. 20v F.S.
  137. OUTPUT 1;R4"u
  138. 200v F.S."
  139. OUTPUT 1;R5"u
  140. 1000v F.S.
  141. 1000v"
  142. Label5_Click
  143.